
{mfdeclre.i}

define input  parameter part like pts_part no-undo.
define input  parameter subpart like pts_sub_part no-undo.

do on error undo, retry :
    for each ptsd_det exclusive-lock where ptsd_part = part :
        delete ptsd_det.
    end.
end.
